﻿Public Class Articulo

    Dim _ART_Codigo, _ART_Descripcion, _UND_Codigo, _CLA_Codigo, _ART_MLPrecio1 As String
    Dim _ART_LPrecio1 As Double, _ART_MLPrecio2 As String, _ART_LPrecio2 As Double
    Dim _ART_MLPrecio3 As String, _ART_LPrecio3 As Double, _ART_Costos As Double, _ART_CostoD As Double
    Dim _PROV_Codigo As String, _ART_Stock As Double, _ART_UndDespacho As Double, _ART_Ubicacion As String
    Dim _ART_UbicaMas, _ART_Largo, _ART_Combo, _ART_Percepcion, _ART_MConstruccion As String
    Dim _ART_CantxLlegar, _ART_ProxLlegada, _ART_Activo As String
    Dim _TCC_Venta, _TCCCompra As Double
    Dim _ART_Descuentos As Descuentos()

    Sub New()

    End Sub

    Public Property ART_Codigo() As String
        Get
            Return _ART_Codigo
        End Get
        Set(value As String)
            _ART_Codigo = value
        End Set
    End Property

    Public Property ART_Descripcion() As String
        Get
            Return _ART_Descripcion
        End Get
        Set(value As String)
            _ART_Descripcion = value
        End Set
    End Property

    Public Property UND_Codigo() As String
        Get
            Return _UND_Codigo
        End Get
        Set(value As String)
            _UND_Codigo = value
        End Set
    End Property

    Public Property CLA_Codigo() As String
        Get
            Return _CLA_Codigo
        End Get
        Set(value As String)
            _CLA_Codigo = value
        End Set
    End Property

    Public Property ART_MLPrecio1() As String
        Get
            Return _ART_MLPrecio1
        End Get
        Set(value As String)
            _ART_MLPrecio1 = value
        End Set
    End Property

    Public Property ART_LPrecio1() As Double
        Get
            Return _ART_LPrecio1
        End Get
        Set(value As Double)
            _ART_LPrecio1 = value
        End Set
    End Property

    Public Property ART_MLPrecio2() As String
        Get
            Return _ART_MLPrecio2
        End Get
        Set(value As String)
            _ART_MLPrecio2 = value
        End Set
    End Property

    Public Property ART_LPrecio2() As Double
        Get
            Return _ART_LPrecio2
        End Get
        Set(value As Double)
            _ART_LPrecio2 = value
        End Set
    End Property

    Public Property ART_MLPrecio3() As String
        Get
            Return _ART_MLPrecio3
        End Get
        Set(value As String)
            _ART_MLPrecio3 = value
        End Set
    End Property

    Public Property ART_LPrecio3() As Double
        Get
            Return _ART_LPrecio3
        End Get
        Set(value As Double)
            _ART_LPrecio3 = value
        End Set
    End Property

    Public Property ART_Costos() As Double
        Get
            Return _ART_Costos
        End Get
        Set(value As Double)
            _ART_Costos = value
        End Set
    End Property

    Public Property ART_CostoD() As Double
        Get
            Return _ART_CostoD
        End Get
        Set(value As Double)
            _ART_CostoD = value
        End Set
    End Property

    Public Property PROV_Codigo() As String
        Get
            Return _PROV_Codigo
        End Get
        Set(value As String)
            _PROV_Codigo = value
        End Set
    End Property

    Public Property ART_Stock() As Double
        Get
            Return _ART_Stock
        End Get
        Set(value As Double)
            _ART_Stock = value
        End Set
    End Property

    Public Property ART_UndDespacho() As Double
        Get
            Return _ART_UndDespacho
        End Get
        Set(value As Double)
            _ART_UndDespacho = value
        End Set
    End Property

    Public Property ART_Ubicacion() As String
        Get
            Return _ART_Ubicacion
        End Get
        Set(value As String)
            _ART_Ubicacion = value
        End Set
    End Property

    Public Property ART_UbicaMas() As String
        Get
            Return _ART_UbicaMas
        End Get
        Set(value As String)
            _ART_UbicaMas = value
        End Set
    End Property

    Public Property ART_Largo() As String
        Get
            Return _ART_Largo
        End Get
        Set(value As String)
            _ART_Largo = value
        End Set
    End Property

    Public Property ART_Combo() As String
        Get
            Return _ART_Combo
        End Get
        Set(value As String)
            _ART_Combo = value
        End Set
    End Property

    Public Property ART_Percepcion() As String
        Get
            Return _ART_Percepcion
        End Get
        Set(value As String)
            _ART_Percepcion = value
        End Set
    End Property

    Public Property ART_MConstruccion() As String
        Get
            Return _ART_MConstruccion
        End Get
        Set(value As String)
            _ART_MConstruccion = value
        End Set
    End Property

    Public Property ART_CantxLlegar() As String
        Get
            Return _ART_CantxLlegar
        End Get
        Set(value As String)
            _ART_CantxLlegar = value
        End Set
    End Property

    Public Property ART_ProxLlegada() As String
        Get
            Return _ART_ProxLlegada
        End Get
        Set(value As String)
            _ART_ProxLlegada = value
        End Set
    End Property

    Public Property ART_Activo() As String
        Get
            Return _ART_Activo
        End Get
        Set(value As String)
            _ART_Activo = value
        End Set
    End Property

    Public Property TCCVenta() As Double
        Get
            Return _TCC_Venta
        End Get
        Set(value As Double)
            _TCC_Venta = value
        End Set
    End Property

    Public Property TCCCompra() As Double
        Get
            Return _TCCCompra
        End Get
        Set(value As Double)
            _TCCCompra = value
        End Set
    End Property

    Public Property ART_Descuentos() As Descuentos()
        Get
            Return _ART_Descuentos
        End Get
        Set(value As Descuentos())
            _ART_Descuentos = value
        End Set
    End Property

End Class
